home *** CD-ROM | disk | FTP | other *** search
/ Chip 1997 March / CHIP Mart 1997.iso / SurfCam / SURFCAM.Z / CIN850.M3 < prev    next >
Text File  |  1996-04-01  |  4KB  |  132 lines
  1. name Cincinnati Milacron 850MC SX
  2.  
  3. % 00
  4. : 00
  5. / 00
  6. O >2
  7. N >4
  8. G >2
  9. e 00
  10. X ->3.>4
  11. Y ->3.>4
  12. Z ->3.>4
  13. I ->3.>4
  14. J ->3.>4
  15. K ->3.>4
  16. Q ->3.>4
  17. R ->3.>4
  18. P >40
  19. S >4
  20. F >3.1
  21. H >2
  22. D >2
  23. b 00
  24. T >2
  25. c 00
  26. M >2
  27. U ->3.>4
  28. V ->3.>4
  29. j >1 J
  30. m >6
  31. ) 00
  32.  
  33. ModalLetters X Y Z F R                # List of letters that are modal    
  34.  
  35. ModalGs 0 1 2 3 73 74 76 80 81 82 83 84 85  # List of g codes that are modal    
  36.  
  37. Sequence#s N 0 1 1                    # Char, freq, incr & start          
  38. First#? N                             # Y or N  'Output 1st sequence no.  
  39. Last#? N                              # Y or N  'Output last sequence no. 
  40.  
  41. HCode X                               # X or X U  'Horizontal char.       
  42. VCode Y                               # Y or Y V  'Vertical char.         
  43. Dcode Z                               # Depth char.                       
  44. FeedCode F                            # Feed rate char.                   
  45.  
  46. Comment (MSG,                         # Begin End comment char.           
  47.  
  48. Spindle 3 4 5                         # Cw, ccw & stop m codes            
  49. Coolant 8 9 7                         # On, Off & Mist m codes            
  50. DComp 41 42 40                        # Left, Right & Cancel m codes      
  51. LComp 43 49                           # On & Off codes                    
  52.  
  53. Feed G1                             # Linear move                       
  54. Rapid G0                            # Rapid positioning word            
  55. Cw G2                               # Circular move clockwise           
  56. Ccw G3                              # Circular move counter clockwise   
  57. Inc/Abs G 91 90                       # Inc & Abs char. & values          
  58. Work G                                # Work offset register              
  59. CtrCode I J                           # I J or R or I J K L               
  60. Helical? N
  61.  
  62. Spaces? Y                             # Y or N  'Spaces between words     
  63. Incremental? N                        # Y or N  'Inc or abs output        
  64. CtrIncremental? N                     # Y or N  'Inc or abs I & J         
  65. ByQuadrants? N                        # Y or N  'Break arcs at quadrants  
  66.  
  67. UppercaseComments? Y                  # Y or N 'Require uppercase comments
  68.  
  69. Drill                                 # Drilling canned/manual cycle      
  70. G81 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  71. end cancel
  72.  
  73. Peck                                  # Pecking canned/manual cycle       
  74. G83 X[H] Y[V] Z[D] K[VBite] R[Vclear] F[FRate] j[Val10]
  75. end cancel
  76.  
  77. Tap                                   # Tapping canned/manual cycle       
  78. G84 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  79. end cancel
  80.  
  81. Ream                                  # Reaming canned/manual cycle       
  82. G85 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  83. end cancel
  84.  
  85. Bore                                  # Boring canned/manual cycle        
  86. G86 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  87. end cancel
  88.  
  89. Back                                  # Back boring canned/manual cycle   
  90. G87 X[H] Y[V] Z[D] U0 V[SClear] I0 K0 R[Vclear] F[FRate]
  91. end cancel
  92.  
  93. Cancel                                # Cancel a canned/manual cycle      
  94. G80
  95. end
  96.  
  97. Ask [Val10] " Enter 1 for full retract peck cycle, or 0 for chip-break: " "1"
  98.  
  99. StartCode                             # Start of the program              
  100. %0
  101. :0 G0
  102. m[Program#] )0
  103. End
  104.  
  105. 1stToolChange                         # First tool change                 
  106. T[Tool] M6
  107. S[Speed] F[FRate] M[Direct] M[Cool]
  108. End
  109.  
  110. Infeed                                # Enable cutter comp                
  111. G[Side] X[H] Y[V] F[FRate]
  112. end
  113.  
  114. Outfeed                               # Disable cutter comp               
  115. G1 G40 X[H] Y[V]
  116. end
  117.  
  118. ToolChange                            # Secondary tool changes            
  119. T[Tool] M6
  120. S[Speed] F[FRate] M[Direct] M[Cool]
  121. End
  122.  
  123. EndCode                               # End of the program                
  124. M2
  125. %0
  126. End
  127.  
  128. Replace "e" with "="
  129. Replace "b" with "["
  130. Replace "c" with "]"
  131. Replace "m" with "(MSG,PROGRAM NO. "
  132.